home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1989 July / 64er_Magazin_89-07_1989_Markt__Technik_de_Side_A.d64 / comdir ! (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  1KB  |  19 lines
  1. 0 rem (w) 1989 by joerg augustin
  2. 1 print"[147]das autostartprogramm '!' wird erzeugt. durch load '!',8,1 wird ";
  3. 2 print"ein komfortablesdirectory gezeigt (ladehilfe)! mit shiftwird angehalten"
  4. 3 open 15,8,15:open2,8,3,"!,p,w":print#2,chr$(2);chr$(3);
  5. 4 for i=0 to 251: read a:print#2,chr$(a);:next:close2:close3
  6. 5 data52,3,124,165,26,167,228,167,134,174,0,0,37,48,76,72,178,0,49,234,20
  7. 6 data194,71,254,74,243,145,242,14,242,80,242,51,243,87,241,202,241,237,246
  8. 7 data62,241,47,243,102,254,165,244,237,245,169,36,133,2,169,127,162,8,160
  9. 8 data0,32,186,255,169,1,162,2,32,189,255,32,192,255,162,127,32,198,255,32
  10. 9 data207,255,32,207,255,32,207,255,240,71,32,207,255,32,207,255,170,32,207
  11. 10 data255,72,160,0,32,221,3,32,207,255,240,31,201,34,208,247,32,210,255,32
  12. 11 data207,255,201,34,208,246,160,6,32,221,3,32,207,255,32,210,255,208,248
  13. 12 data169,35,133,211,104,32,205,189,32,63,171,169,13,32,210,255,173,142,2
  14. 13 data41,1,240,180,32,204,255,169,127,32,195,255,169,131,141,2,3,169,164
  15. 14 data141,3,3,169,0,133,211,160,12,32,221,3,133,45,169,7,133,46,160,255,162
  16. 15 data3,200,208,2,230,46,177,45,208,245,202,208,244,200,208,2,230,46,132
  17. 16 data45,76,131,164,185,233,3,240,6,32,210,255,200,208,245,96,76,79,65,68
  18. 17 data32,0,34,44,56,44,49,0,83,89,83,56,50,48,13,145,0
  19.